home *** CD-ROM | disk | FTP | other *** search
/ MusicScapes Professional / MusicScapes Professional (Wayzata Technology)(1381)(1995).bin / elements / groove / 00002_Script_2 next >
Text File  |  1994-11-22  |  412b  |  15 lines
  1. on exitFrame
  2.   global lastSoundLevel
  3.   global oldSoundLevel
  4.   installMenu 27
  5.   put the soundLevel into lastSoundLevel
  6.   set lastSoundLevel1 to lastSoundLevel + 1
  7.   set the checkMark of menuItem lastSoundLevel1 of menu "Volume" to TRUE
  8. updateStage
  9.   if soundBusy (1) then continue
  10.   else play done
  11.   if the controlDown and the key = "." then go to frame "Leave"
  12.   --else continue
  13.   end if
  14. end if
  15. end